home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / pc / tutorial / devglry / zoetek / source / shckclck.dir / 00132_On-Off Timer.ls < prev    next >
Encoding:
Text File  |  1996-04-11  |  160 b   |  11 lines
  1. global timeron, smallnil
  2.  
  3. on mouseDown
  4.   set timeron to not timeron
  5.   timerdone()
  6.   if the result and timeron then
  7.     beep()
  8.     set timeron to 0
  9.   end if
  10. end
  11.